home *** CD-ROM | disk | FTP | other *** search
/ Electronics Boutique Catalog 1996 Spring / 1996 Electronics Boutique Spring CD-ROM (USA).bin / eb / demos / hyper.dir / 00043.ls < prev    next >
Encoding:
Text File  |  1995-12-12  |  1.1 KB  |  47 lines
  1. global gFirstTime, gCurrentFrame, gReverse, gForward
  2.  
  3. on exitFrame
  4.   if gFirstTime then
  5.     startTimer()
  6.     set gFirstTime to 0
  7.   end if
  8.   repeat while the timer < (60 * 5)
  9.     set the visible of sprite 7 to 0
  10.     set the visible of sprite 8 to 0
  11.     set the visible of sprite 9 to 0
  12.     if rollOver(3) then
  13.       set the visible of sprite 7 to 1
  14.       if the mouseDown then
  15.         legalButton(3)
  16.         set gCurrentFrame to gCurrentFrame - 1
  17.         advanceToCurrentFrame()
  18.         exit
  19.       end if
  20.     else
  21.       if rollOver(4) then
  22.         set the visible of sprite 8 to 1
  23.         if the mouseDown then
  24.           updateStage()
  25.           legalButton(4)
  26.           delayFor(15)
  27.           go(the frame + 1)
  28.           exit
  29.         end if
  30.       else
  31.         if rollOver(5) then
  32.           set the visible of sprite 9 to 1
  33.           if the mouseDown then
  34.             legalButton(5)
  35.             set gCurrentFrame to gCurrentFrame + 1
  36.             advanceToCurrentFrame()
  37.             exit
  38.           end if
  39.         end if
  40.       end if
  41.     end if
  42.     updateStage()
  43.   end repeat
  44.   set gCurrentFrame to gCurrentFrame + 1
  45.   advanceToCurrentFrame()
  46. end
  47.